home *** CD-ROM | disk | FTP | other *** search
- ;
- ; Spitfire Installer Script
- ; Copyright ©1999 Ralph Torchia
- ; All Rights Reserved
- ;
- ; Email: torchia@windsor.igs.net
- ; WWW : http://www.windsor.igs.net/~torchia/
- ;
- ; $VER: Spitfire-Install v1.2 (03.05.1999)
- ;
- ;---------------------------------------------------------------------
-
- ;__________Set up variables__________
-
- ;copyright
- (set #copyright "Copyright ©1999 Ralph Torchia")
-
- ;minimal os for installation
- (set #min_os_version 39)
- (set #min_os_revision 0)
-
- ;spitfire version
- (set #spit_ver (getversion "Spitfire"))
- (set #spit_version (/ #spit_ver 65536))
- (set #spit_revision (- #spit_ver (* #spit_version 65536) ) )
-
- ;default destination directories
- (set #dest-spitfire "Work:")
- (set #dest-libs "LIBS:")
- (set #dest-mui "MUI:Libs/mui/")
-
- ;default language
- (set @language "english")
- ;---------------------------------------------------------------------
-
- ;__________English__________
- (set #welcome-msg ("Welcome to Spitfire!\n\nInstallation for Spitfire version %ld.%ld\n\nCopyright ©1999 Ralph Torchia\nAll Rights Reserved" #spit_version #spit_revision))
-
- (set #dest-prompt "Where shall the Spitfire program be placed? (a directory will be created)")
- (set #dest-help "Use the requester to select an area on your system where you want the Spifire folder located")
-
- (set #libs-prompt "Copying to LIBS: the file ")
- (set #libs-help "")
-
- (set #mui-prompt "Copying to MUI:Libs/mui/ the file ")
- (set #mui-help "")
-
- (set #dir-prompt "Creating directory for Spitfire...")
- (set #dir-help "")
-
- (set #spit-prompt "Copying Spitfire...")
- (set #spit-help "")
-
- (set #imgs-asktype "Which Images do you want to install with Spitfire?")
- (set #imgs-prompt "Copying Spitfire images...")
- (set #imgs-help "")
-
- (set #guide-prompt "Copying Spitfire Guide...")
- (set #guide-help "")
-
- (set #icon-msg1 "Copying Spitfire icon...")
- (set #icon-msg2 "Copying Spitfire Guide icon...")
- (set #icon-help "")
-
- (set #key-prompt "Copying Spitfire key...")
- (set #key-help "")
- (set #key-msg "Thank-you for registering Spitfire! Your support is greatly appreciated.")
-
- (set #exit-msg "Spitfire installation is finished!\n\nRemember, this product is shareware!")
- ;---------------------------------------------------------------------
-
- ;__________Introduce Outselves__________
- (welcome #welcome-msg)
-
- (set #dest-spitfire
- (askdir
- (prompt #dest-prompt)
- (help #dest-help)
- (default #dest-spitfire)
- )
- )
- (set #dest-spitfiredir (tackon #dest-spitfire "Spitfire"))
- (set @default-dest #dest-spitfire)
- (set #dest-spitfireimg (tackon #dest-spitfiredir "images"))
-
- ;__________Copy libs__________
- (
- (copylib
- (prompt #libs-prompt "palmlink.library")
- (help #libs-help)
- (confirm "average")
- (source "libs/palmlink.library")
- (dest #dest-libs)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #libs-prompt "date.library")
- (help #libs-help)
- (confirm "average")
- (source "libs/date.library")
- (dest #dest-libs)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #libs-prompt "vapor_toolkit.library")
- (help #libs-help)
- (confirm "average")
- (source "libs/vapor_toolkit.library")
- (dest #dest-libs)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #libs-prompt "vapor_update.library")
- (help #libs-help)
- (confirm "average")
- (source "libs/vapor_update.library")
- (dest #dest-libs)
- (optional "oknodelete" "force")
- )
- )
-
- ;__________Copy MUI stuff__________
- (
- (copylib
- (prompt #mui-prompt "InfoText.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/InfoText.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "MonthNavigator.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/MonthNavigator.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "MonthNavigator.mcp")
- (help #mui-help)
- (confirm "average")
- (source "mui/MonthNavigator.mcp")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "NFloattext.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/NFloattext.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "NList.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/NList.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "NListview.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/NListview.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "NListviews.mcp")
- (help #mui-help)
- (confirm "average")
- (source "mui/NListviews.mcp")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "Textinput.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/Textinput.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "Textinput.mcp")
- (help #mui-help)
- (confirm "average")
- (source "mui/Textinput.mcp")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- (copylib
- (prompt #mui-prompt "Textinputscroll.mcc")
- (help #mui-help)
- (confirm "average")
- (source "mui/Textinputscroll.mcc")
- (dest #dest-mui)
- (optional "oknodelete" "force")
- )
- )
-
- ;__________Copy Spitfire__________
- (if (not (exists #dest-spitfiredir))
- (
- (makedir #dest-spitfiredir
- (prompt #dir-prompt)
- (help #dir-help)
- (infos)
- )
-
- (copyfiles
- (prompt #icon-msg1)
- (help #icon-help)
- (source "Spitfire.info")
- (dest #dest-spitfiredir)
- )
- (copyfiles
- (prompt #icon-msg2)
- (help #icon-help)
- (source "Spitfire.guide.info")
- (dest #dest-spitfiredir)
- )
- )
- )
- (
- (copyfiles
- (prompt #spit-prompt)
- (help #spit-help)
- (source "Spitfire")
- (dest #dest-spitfiredir)
- )
- (copyfiles
- (prompt #guide-prompt)
- (help #guide-help)
- (source "Spitfire.guide")
- (dest #dest-spitfiredir)
- )
- )
-
- ;__________Copy Image folder__________
- (set #imgs-choice
- (askchoice
- (prompt #imgs-asktype)
- (help @askchoice-help)
- (choices "MagicWB"
- "NewIcons - Bordered"
- "NewIcons - No Border")
- (default 0)
- )
- )
-
- (if (= #imgs-choice 0)
- (set #imgs-source "images/magicwb/")
- (set #imgs-logo "images/SpitfireLogo")
- )
- (if (= #imgs-choice 1)
- (set #imgs-source "images/newicons-border/")
- (set #imgs-logo "images/SpitfireLogo2-256")
- )
- (if (= #imgs-choice 2)
- (set #imgs-source "images/newicons-noborder/")
- (set #imgs-logo "images/SpitfireLogo2-256")
- )
-
- (copyfiles
- (prompt #imgs-prompt)
- (help #imgs-help)
- (source #imgs-source)
- (all)
- (dest #dest-spitfireimg)
- )
-
- (copyfiles
- (prompt #imgs-prompt)
- (help #imgs-help)
- (source #imgs-logo)
- (dest #dest-spitfireimg)
- (newname "SpitfireLogo")
- )
-
- ;__________Copy key if found__________
- (if (exists "spitfire.key")
- (
- (copyfiles
- (prompt #key-prompt)
- (help #key-help)
- (source "spitfire.key")
- (dest #dest-spitfiredir)
- )
- (message #key-msg)
- )
- )
-
- (exit #exit-msg)
-